home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Dev / SpeakFreely_Src / lpc10 / median.c < prev    next >
Encoding:
Text File  |  2000-05-27  |  559 b   |  31 lines
  1. /**********************************************************************
  2. *
  3. *    MEDIAN Version 45G
  4. *
  5. **********************************************************************
  6. *
  7. *  Find median of three values
  8. *
  9. * Input:
  10. *  D1,D2,D3 - Three input values
  11. * Output:
  12. *  MEDIAN - Median value
  13. */
  14.  
  15. int median( d1, d2, d3 )
  16. int d1, d2, d3;
  17. {
  18. int the_median;
  19.  
  20. the_median = d2;
  21. if    ( d2 > d1 && d2 > d3 ) {
  22.     the_median = d1;
  23.     if ( d3 > d1 ) the_median = d3;
  24. }
  25. else if ( d2 < d1 && d2 < d3 ) {
  26.        the_median = d1;
  27.        if ( d3 < d1 ) the_median = d3;
  28. }
  29. return(the_median);
  30. }
  31.